﻿Public Class Epersona

    Private nombreyapellido As String
    Private edad As String
    Private dni As String
    Private telefono1 As String
    Private telefono2 As String
    Private email As String
    Private domicilio As String
    Private fecha_nacimento As String
    Private cod_localidad As Integer

    Public Sub New()

        nombreyapellido = ""
        edad = ""
        dni = ""
        telefono1 = ""
        telefono2 = ""
        email = ""
        domicilio = ""
        fecha_nacimento = ""
        cod_localidad = 0

    End Sub
    Public Property nomyapepers() As String
        Get
            Return nombreyapellido
        End Get
        Set(ByVal value As String)
            nombreyapellido = value
        End Set
    End Property
    Public Property edadpers() As String
        Get
            Return edad
        End Get
        Set(ByVal value As String)
            edad = value
        End Set
    End Property
    Public Property dnipers() As String
        Get
            Return dni
        End Get
        Set(ByVal value As String)
            dni = value
        End Set
    End Property
    Public Property tel1pers() As String
        Get
            Return telefono1
        End Get
        Set(ByVal value As String)
            telefono1 = value
        End Set
    End Property
    Public Property tel2pers() As String
        Get
            Return telefono2
        End Get
        Set(ByVal value As String)
            telefono2 = value
        End Set
    End Property

    Public Property emailpers() As String
        Get
            Return email
        End Get
        Set(ByVal value As String)
            email = value
        End Set
    End Property
    Public Property dompers() As String
        Get
            Return domicilio
        End Get
        Set(ByVal value As String)
            domicilio = value
        End Set
    End Property

    Public Property fechanacpers() As String
        Get
            Return fecha_nacimento
        End Get
        Set(ByVal value As String)
            fecha_nacimento = value
        End Set
    End Property

    Public Property codlocpers() As String
        Get
            Return cod_localidad
        End Get
        Set(ByVal value As String)
            cod_localidad = value
        End Set
    End Property



End Class
